home *** CD-ROM | disk | FTP | other *** search
File List | 1994-04-02 | 3.0 KB | 133 lines |
- Motorola DSP56000 Assembler Version 3.1 94-04-01 20:57:17 tst3.asm Page 1
-
-
-
- 1 ; generate FSK modulated sinewave on the left channel
- 2
- 214
- 215
- 216 000020 buflen equ 32
- 217 0007D0 f equ 2000
- 218 003E80 fs equ 16000
- 219
- 220 ; two integrator sinewave generator
- 221 sg macro store
- 222 m move x:store,a
- 223 m move x:store+1,b
- 224 m
- 225 m move b,y0
- 226 m mac x0,y0,a
- 227 m move a,y0
- 228 m mac -x0,y0,b
- 229 m
- 230 m move a,x:store
- 231 m move b,x:store+1
- 232 m endm
- 233
- 234
- 235 P:0040 org p:user_code
- 236
- 237 P:0040 67F400 move #buffer+2,r7
- 000082
- 238 P:0042 057FA7 move #buflen*4-1,m7
- 239
- 240 P:0043 62F400 move #buffer,r2
- 000080
- 241 P:0045 3A0400 move #4,n2
- 242 P:0046 057FA2 move #buflen*4-1,m2
- 243
- 244 ctrlcd 1,r2,buflen,LINEI,0.0,0.0,LINEO|HEADP
- ,0.0,0.0
- 265 P:0052 205A00 move (r2)+
- 266 opencd fs/1000
- 295
- 296 ; wait for one sample
- 297 loop waitblk r2,buflen,1
- 315
- 316 ; then generate the sinewave
- 317 P:0064 44F400 move #6.2832*500.0/fs,x0
- 1921FF
- 318 sg sg1
- 329 P:0072 44F400 move #6.2832*f/fs,x0
- 6487FD
- 330 P:0074 200048 add x0,b
- 331 P:0075 21E400 move b,x0
- 332 sg sg2
- 343
- 344 ; and output the generated sample
- 345 P:0082 5F4A00 move b,y:(r2)+n2
- 346
- 347
- 348 P:0083 0C0056 jmp <loop
- 349
- 350
- 351 X:0018 org x:user_data
- 352
- 353 X:0018 sg1 dc 0.04,0.04
- Motorola DSP56000 Assembler Version 3.1 94-04-01 20:57:17 tst3.asm Page 2
-
-
-
- 354 X:001A sg2 dc 0.2,0.2
- 355
- 356 X:0080 buffer dsm buflen*4
- 357
- 358
- 359 Y:0018 org y:user_data
- 360
- 361 Y:0080 dsm buflen*4
- 362
- 363
- 364 end
-
- 0 Errors
- 0 Warnings
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-